(find-file-noselect): Verify other buffers' file numbers are still valid.
authorRichard M. Stallman <rms@gnu.org>
Sun, 11 Apr 1993 21:22:35 +0000 (21:22 +0000)
committerRichard M. Stallman <rms@gnu.org>
Sun, 11 Apr 1993 21:22:35 +0000 (21:22 +0000)
lisp/files.el

index fe3a29cfdd1fa3ca14a832d4ee728b37a6648fa9..5d1b91ce823e6097a045ba3e05592268324a3868 100644 (file)
@@ -480,7 +480,11 @@ The buffer is not selected, just returned to the caller."
                       (while (and (not found) list)
                         (save-excursion
                           (set-buffer (car list))
-                          (if (equal buffer-file-number number)
+                          (if (and (equal buffer-file-number number)
+                                   ;; Verify this buffer's file number
+                                   ;; still belongs to its file.
+                                   (file-exists-p buffer-file-name)
+                                   (equal (nthcdr 10 (file-attributes buffer-file-name)) number))
                             (setq found (car list))))
                         (setq list (cdr list)))
                       found))))